/*
 * Copyright (c) 1999 Johnny C. Lam.
 * All rights reserved.
 *
 * Permission to use, copy, modify, distribute and sell this software
 * and its documentation for any purpose is hereby granted without fee,
 * provided that the above copyright notice appear in all copies and
 * that both that copyright notice and this permission notice appear
 * in supporting documentation.  The author makes no representations
 * about the suitability of this software for any purpose.  It is
 * provided "as is" without express or implied warranty.
 */

#include "geometric.h"

probability
Geometric::operator()(int k) const
{
    if (k < 0)
	return 0;
    else {
	probability prob = _p;
	while (k-- > 0)
	    prob *= 1 - _p;
	return prob;
    }
}
